home *** CD-ROM | disk | FTP | other *** search
/ Turnbull China Bikeride / Turnbull China Bikeride - Disc 2.iso / STUTTGART / CBA / INFORM / Inform / z / hellow < prev   
Text File  |  1993-09-08  |  689b  |  32 lines
  1. !
  2. ! A great step backward in interactive fiction...
  3. !
  4.  
  5. Object hillside "Bare hillside" nothing;
  6. global place = hillside;
  7. global score = 0;
  8. global turns = 1;
  9.  
  10. [ Main;
  11.  
  12.   print "^^^^^^^^^^^You wake up, shivering to see that Morgoth \
  13.          the Flatulent Devil is towering over you...^^";
  14.   Message();
  15.   print "^^\
  16.     ...and he squashes you effortlessly.^^   *** You have died ***^^^^^";
  17.  
  18.   quit;
  19. ];
  20.  
  21. [ Message i;
  22.   print "HELLO CRUEL WORLD^";
  23.   print "A Non-Interactive Demonstration^\
  24.          Copyright (c) 1993 by Graham Nelson. All rights reserved.^";
  25.   print "Release ";
  26.   print_num (0-->1) & $03ff;
  27.   print " / Serial number ";
  28.  
  29.   for i 18 to 23 { print_char 0->i; } new_line;
  30. ];
  31.  
  32.